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Abstract 

We propose a method to adapt functional logic programming to deal with reasoning on 
coinductively interpreted programs as well as on inductively interpreted programs. In order 
JH , to do so, we consider a class of objects interesting for this coinductive interpretation, namely 

regular terms. We show how the usual data structures can be adapted to capture these 
objects. We adapt the operational semantics of Curry to interpret programs coinductively. 
We illustrate this method with several examples that show the working of our method and 
several cases in which it could be useful. Finally, we suggest how the declarative semantics 
can be adapted suitably. 
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1 Introduction 



Within the paradigm of declarative programming, several styles of programming have been devel- 
oped, among which logic and functional programming. One of the benefits of logic programming 
^ I is its use of free variables and its inherent capabilities to model search problems. The benefits 

l/") ■ of functional programming include its efficient execution. Attempts to combine the best of both 

CO I worlds have resulted in functional logic programming. An example of this combination is the 

programming language Curry [Illl]). 

Another development within the paradigm of declarative programming is to develop mech- 
^J^ ■ anisms to reason about coinductively defined semantics, besides the usual inductively defined 

semantics. This is useful, for instance, to reason about infinite data, and processes and their 
states. In the case of logic programming, this resulted in co-logic programming [5]. Another 
approach to reason about coinductive semantics concerns proof mechanisms based on circularity 
[1], which are used in the coinductive prove engine CIRC [5], for instance. However, in the case 
of functional logic programming, no such adaptation to a coinductive interpretation has been 
^ . developed. 

In this paper, we will generalize the idea of circular coinduction to be used in the domain 
of functional logic programming. Similarly to detecting circularity in equality proofs (as is the 
case in circular coinduction), we will detect circularity in a reduction derivation. By means of 
assuming a certain resulting value for terms that appear repeatedly in such circular reduction 
sequences, we can resolve these circularities. Circular coinduction is a particular (Boolean) case 
of this general mechanism. Hence the name generalized circular coinduction for this method. 

In Section [5J we will define some preliminary notions used in our approach. We define a data 
structure to capture a particular (finitely representable) class of infinite terms, and we show how 
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to perform several basic operations on these data structures. Then, in Section[31 we describe how 
we propose to modify the computational strategy from [T] with generalized circular coinduction. 
In Section HJ we will show the benefits of this approach by means of several examples. We 
suggest a possible declarative semantics for the mechanism in Section \5\ before concluding and 
suggesting directions of further research in Section [51 

2 Preliminaries 

2.1 Cyclic terms 

Certain classes of infinite terms can be described finitely. One such class is the class of regular 
infinite terms. A term is regular if is has only finitely many different subterms. It is easy to 
see that all finite terms are regular. In this paper we will consider (finite and infinite) finitely- 
branching regular terms, such as the terms in Example [TJ Example [5] shows a term that is not 
finitely-branching. 

Example 1. An example of a non- regular infinite term is the infinite tree Fi, where Ti for i G N 
is defined as follows, for a (fixed) binary constructor symbol *: 

Ti = *(i,ri+i) 

The set of subterms sub{Ti) = NU {Fj | j G N} of Fi is infinite. An example of a regular infinite 
term is the infinite tree A, where A is defined as follows, for a (fixed) binary constructor symbol 
•: 

A = *(1,A) 

The set of subterms sub{A) = {I, A} of A is finite. 

Example 2. Another example of a regular infinite term is the infinite tree A, defined as follows, 
for a (fixed) constructor symbol o of infinite arity. 

A = o(A,A,...) 

In other words, each of the (infinitely many) direct subterms of the root of A is A. Note that 
the set of subterms sub{A) ~ {A} of A is finite. In this paper, however, we restrict ourselves to 
finitely branching terms. 

In the following we develop the technical machinery to represent such (finitely-branching) 
regular terms. We will use two different kinds of variables: frozen variables and regular variables. 
We fix a set 3^ = {y, y', y", . . .} U {yi, y2, . . .} of frozen variables and a set <¥ = {x, x' , x" , . . .} U 
{xi,X2, . . .} of regular variables. We let T, = C (j J-' denote a signature consisting of constructor 
symbols C and function symbols J-. We let Var : 'E{X uy) — >■ 'P{X) denote the function that 
returns the set of all variables occurring in a given term. Also, we let FVar : J^{X U 3^) ^ ^(3^) 
denote the function that returns the set of all frozen variables occurring in a given term. We 
denote the extension of Var (resp. FVar) to sets of terms also with Var (resp. FVar). 

Consider a mapping p from a set S to the same set S, that maps all but a finite set of values 
{si, . . . , Sn} C 5* to themselves. In the following, we will interchangeably use the following three 
views of such mappings. Either we view p as a finite set of pairs {si i— > ii, . . . , s„ i— t- i„} that 
correspond to the mappings of elements that are not mapped to themselves, or we view p as 
a total function with domain {si,...,s„}, or we view p as a total function with domain 5, 
that maps all values not in {si, . . . , s„} to themselves. Also, for any such mapping p and any 
S C dom{p), we let p\s = {.s ^ t G p | s G 5*}. 

We represent finitely branching, regular terms with the following structures. 



Definition 3 (Cyclic terms). A cyclic term over a signature S and a set of variables A" is a term 
t e T.{X U y), together with a complete mapping : FVar{t) -^ Y.{X U FVar{t))\FVar{t). We 
say that a cyclic term is in base form if Var{rng{9)) C Var{t). 

A cyclic term consisting of t and 9 is denoted with (i, 9). We denote the set of all cyclic terms 
over the signature S, the set of variables X and the set of frozen variables y with CT(S, <Y, 3^), 
or simply CT if E, A" and y are clear from the context. 

Example 0] illustrates how finitely-branching regular terms can be represented by cyclic terms. 

Example 4. The term A from Example [T] with • being the list constructor operator : - in other 
words, the infinite list containing only I's ~ can be represented as the cyclic term (y, {y i— > 1 : y}). 

Certain cyclic terms that are syntactically different can intuitively represent the same terms. 
Below, we define a notion of equivalence of cyclic terms (based on bisimulation on labelled graphs 
extracted from cyclic terms) to capture this intuition. In Example [51 we give an example of two 
syntactically different, but equivalent cyclic terms. 

Definition 5 (Cyclic term graph). For a given cyclic term (i, 9) we define the cyclic term graph 
{V,E,VL,EL) as a graph {V,E) together with a vertex labelling VL : V ^ 2^ and an edge 
labelling EL : _E ^ N as follows: 

• V -.^ {suh{t) U suh{rng{9))) \ y-, 

• y £ VL{v) iS y ey,v £V and y ^^ v £ 9; and 

• {v, v') G E and EL{v, v') = n iff 

— either v' is the n-th subterm of v, 

— or there exists a, y G y such that y is the n-th subterm of v and v' is the unique vertex 
in V such that y e VL{v'). 

Here sub denotes the function that returns the set of subterms occurring in a given term. Note 
that for every y G FVar{t) there exists a unique node v € V such that y £ VL{v), namely the 
unique term v G E(A' U 3^) for which holds y H> v G 0. 

Definition 6 (Cyclic term graph bisimulation). For two given cyclic term graphs (V, E, VL, EL) 
for the cyclic term {t, 9), and {V , E' , VL' , EL') for the cyclic term (i', 9'), we say that two nodes 
w € V and w' G V bisimulate if: 

• there exists a relation Z CV x V' that satisfies the following conditions; 

— if (w, v') G Z, then the terms v and v' must have the same outermost symbol from S, 
or be the same variable from X; 

— if (wi,^^) G Z, and also (wi,W2) G E and EL{vi,V2) — n, then there must exist a 
v'2 G V such that (z;2,W2) G Z, (wi,W2) ^ -E" and EL'{v'-y,v'2) = n; and 

— if {vi,v'i) G Z, and also (w'i,W2) ^ ^' ^^'^ EL'{v't^,v'2) — n, then there must exist a 
V2 £ V such that (w2,'y2) ^ ^i (''^11^2) G E and EL{vi,V2) — n; 

• {w,w') G Z. 

Note that this notion of bisimulation does not depend in any way on the vertex labelings V and 

v. 

For any y G FVar{t) and y' G FV^ar(t'), we say that y and y' bisimulate in the cyclic term 
graphs if we have that u and u' bisimulate in the cyclic term graphs, where m G 1^ is the unique 
node such that y G VL{u) and u' G V is the unique node such that y' G VL'{u'). 



Definition 7 (Equivalence). Two cyclic terms {t,9) and {t',9') are equivalent, denoted with 
{t, 9) = {t' , 6'), iff t and t' bisimulate in the cyclic term graphs for {t, 9) and {t' , 9). 

Example 8. Consider the two cyclic terms {t,d) = {y,{y *-> I : y}) and {t',6') — [y' , {y' i-^ 1 : 
1 : y'}). The cyclic term graph {V, E, VL, EL) for {t, 9) is given by: 

V={l,l:y}, E^{{l:y,l),{l:y,l:y)} 

VL{1) - 0, VL{1 : y) - {y} 
i?L(l:y,l) = l, EL{l:y,l:y)^2 
The cychc term graph [V , £", VL', EL') for {f , 9') is given by: 

r = {1, 1 : yM : 1 : y'}, E' = {(1 : y' , 1), (1 : yM : 1 : y'), (1:1: y', 1), (1 : 1 : y', 1 : y')}, 

yL'(l) = 0, 1/L'(1 : y') = 0, VL'(1 : 1 : y') = {y'} 

SL'(l:yM) = l, £;L'(1 : 1 : y', 1) = 1 

EL'il : y', 1 : 1 : z/) = 2, EL'{1 : 1 : y', 1 : y') = 2 

The relation Z, given below, is a bisimulation that witnesses that 1 : y £ V and 1 : 1 : y' G V 
bisimulate (and also witnesses that y and y' bisimulate). 

Z = {(l,l),(l:y,l:y'),(l:y,l:l:y')} 

This bisimulation thus also witnesses that {t, 9) = {t' , 9'). 

The two cyclic term graphs, together with the given bisimulation are drawn in Figure [1] 




Figure 1: Example of cyclic term graphs for (y, {y i-t- 1 : y}) and (y', {y' i— > 1 : 1 : y'}), and a 
bisimulation. The bisimulation Z is drawn with a dashed line. 

The notion of equivalence of cyclic terms allows us to state the following property. This 
property will allow us to assume, without loss of generality, that cyclic terms are in base form. 

Proposition 9. For every cyclic term there is an equivalent cyclic term in base form. 



Proof. Let {t,9) be a cyclic term. We show that {t',9') = {9{t),9\pyar(0{t))) is an equivalent 
cyclic term in base form. Clearly, (t', 9') is a cyclic term. 

We show that {t',9') is equivalent to {t,9). Consider the cyclic term graphs {V,E,VL,EL) 
for (t,9) and {V',E' ,VL' , EL') for (t',9'). Since {t,9) and {t',9') contain the same subterms 
(that are not frozen variables), we know V = V . Also, the construction of edges and edge labels 
in the cyclic term graph for a cyclic term {t,9) is invariant under application of 9 to t. Thus, 
both cyclic term graphs are isomorphic (when not taking into account vertex labels). Since the 
definition of bisimulation does not use vertex labels, we get that id witnesses that the term 
graphs bisimulatc. Thus {t,9) and {t',9') are equivalent. 

Now, we show that {t' , 9') is in base form. Take an arbitrary x e Var{rng{9')). Since 9' C 9, 
we know x is in Var{rng{9)) as well. Thus there is a y i-^ ty E 9 such that x G Var{ty). By 
definition of cyclic terms, we know that y G FVar{t). Thus x G Var{9{t)) ~ Var{t'). D 

When dealing with terms containing variables, a notion of substitutions is required. We define 
substitutions on cyclic terms and their effect as follows. 

Definition 10 (Substitutions). A substitution for cyclic terms is a mapping a : X ^i- T^{X L) y) 
that maps all but finitely many variables to themselves, together with a total mapping a; : 
FVar{rng{(T)) -^ T,{X U FVar{rng{a)))\FVar{rng{a)). Substitutions are denoted with {a,uj). 
We denote the unique homomorphic extension a oi a on 'E{X U y) also with a if no confusion 
arises. Similarly for the unique homomorphic extension uj of a; on ^^{X U y) . 

Definition 11 (Safe substitutions). A substitution {a,uj) is safe for acyclic term {t, 9) ii dom{uj)ri 
FVar{t) = 0. In other words, a substitution is safe for a cyclic term, if it doesn't redefine (the 
mapping of) frozen variables that were already defined. 

Definition 12 (Proper substitutions). A substitution (ct, w) is proper for a cyclic term {t,9) if 
FVar{rng{uj\pvar{<j{t)))) ^ FVar{a{t)). In other words, a substitution is proper for a cyclic 
term (t, 9), if the the mappings of all frozen variables introduced by instantiation of a variable 
in t contain no frozen variables that are not introduced by instantiation of a variable int 

Definition 13 (Effect of safe, proper substitutions). The result {a,uj){t,9) of a substitution 
{cr,io), safe and proper for a cyclic term (t, 9), to this cyclic term {t, 9) is defined as {(j{t), {(t{9) U 
^)\FVar(a(t)))- Hcrc (j{{yi ^ii,...,y„ ^ t„}) == {yi h^ cr(ti), . . . y„ ^ cr(i„)}. 

Proposition 14. The result {t',9') of a substitution (a, cj), safe and proper for a cyclic term 
{t, 9), to this cyclic term {t, 9) is a cyclic term. 

Proof. We show that the result {t' , 9') is a cyclic term. Assume without loss of generality that 
{t,9) is in base form. Since {cr,Lo) is safe for {t,9), we know that dom{a{9)) n dom{uj) ~ 0. 
Therefore ct(^) U a; is a (functional) mapping, and thus so is t' . 

Clearly, dom{9') C FVar{t'). We show that FVar{t') C dom{9'). Take an arbitrary y G 
FVar{t'). Then either (i) y G FVar{t) or (ii) for some x G Var{t), we have x ^^ ty E a for some 
ty and y G FVar{ty). In case (i), y G FVar{(T{t)) and y G dom{9). So also, y G dom{a{9)). 
Therefore, y G dom{9'). In case (ii), y G FVar{a{t)) and y G dom{Lo), thus y G dom{9'). 

Finally, we show that FVar{rng{9')) C FVar{t'). Take an arbitrary y G FVar{rng{9')). 
Then either (i) y G FVar{rng{a{9))) or (ii) y G FVar{rng{uj)). In case (i), either (i.a) y G 
FVar{rng{9)) or (i.b) for some x G Var{rng{9)), we have x i—> tj, G cr and y G FVar{ty). In 
case (i.a), y G FVar{t), so j/ G FVar{t'). In case (i.b), since {t,9) is in base form, x G Var{t) 
and thus y G FVar{t'). In case (ii), we know that y G FVar{rng{u!\pvar((y(t))))- Then, since 
(ct, w) is proper for {t,9), we know that y G FVar{t'). 

We showed that {t' , 9') has the property that 9' is a total mapping from FVar{t') to Y,{X U 
FVar{t'))\FVar{t'). Thus {f , 9') is a cyclic term. D 



These notions of equivalence and substitutions, defined above, allow us to define a notion of 
unification. 

Definition 15 (Unification). A substitution (cr, cj) unifies two cyclic terms (t,9) and {t',0') if 

• it is safe and proper for both {t, 9) and (t', 9'), and 

. {a,Lo){t,9) = {<j,u;){t',9'). 

In order to avoid unwanted side-effects of operations on cyclic terms (or substitutions) that 
happen to share (frozen) variables, we define a method to standardize the frozen variables in two 
cyclic terms apart. We introduce frozen variable renamings, and use them to standardize the 
frozen variables in cyclic terms and substitutions apart. 

Definition 16 (Frozen variable renaming). A frozen variable renaming is a function f : y ^ y 
that maps finitely many y G y to different and pairwise disjoint y' G y, and all other frozen 
variables to themselves. We denote the unique homomorphic extension / of a frozen variable 
renaming / on E(A' U y) also with /, if no confusion arises. 

Definition 17 (Safe frozen variable renaming) . A frozen variable renaming / = {yi ^^ y[, . . . ,yn >-^ 
y'„} is safe for a cyclic term {t, 9) if for all I < i < n we have that y^ ^ FVar{t). 

A frozen variable renaming / = {yi ^^ yj.) • ■ • : J/n ^ 2/n} is ^^^ fo^ ^ substitution (ct, to) if for 
all 1 < i < n we have that yl ^ dom{uj). 

Definition 18 (Renaming frozen variables in cyclic terms). The result f{t, 9) of a frozen variable 
renaming /, safe for a cyclic term {t,9), to this cyclic term {t,9) is the cyclic term {f{t),f{9)), 
where f{9) = {f{y) i—> f{ty) \ y h^ ty <E 9}. The fact that / is safe for {t,9), together with the 
fact that the range of / is pairwise disjoint, assures that /(t, 9) is a cyclic term, and thus that 
applying a safe frozen variable renaming to a cyclic term results in a cyclic term. 

Observation 19. For any cyclic term {t,9) and any frozen variable renaming /, safe for {t,9), 
we have that (t, 9) = f{t, 9). 

Proof (sketch). There exists a trivial bisimulation between the cyclic term graphs of (t, 9) and 
f{t,9). U 

Definition 20 (Renaming frozen variables in substitutions). The result f{<T,uj) of a frozen 
variable renaming / to the substitution (cr, cj) is the substitution {f{<T),f{uj)). The fact that / 
is safe for (cr, oj), together with the fact that the range of / is pairwise disjoint, ensures that the 
result is a substitution. 

Proposition 21. Let {t,9) be a cyclic term, and let (cr, cj) be a substitution, safe and proper 
for {t,9). Also, let / be a frozen variable renaming safe for (ct, w). If /(cr, w) is safe and proper 
for {t,9), then we have that {f{a,u})){t,9) = {a,uj){t,9). 

Proof (sketch). Since / has an effect only on frozen variables, and since the construction of cyclic 
term graphs is invariant under (uniform) substitution of frozen variables, the cyclic term graphs 
for {f{<T,uj)){t,9) and {(T,uj){t,9) are identical. Thus id is the bisimulation that witnesses that 
{f{a\Lu)){t,9) = {a,Lu){t,9). D 

Definition 22 (Standardization apart). Two cyclic terms {t, 9) and (i', 9') are said to have their 
frozen variables standardized apart if FVar{t) fl FVar(t') = 0. Two substitutions (cr, w) and 
(cr', w') are said to have their frozen variables standardized apart if dom{u}) fl dom{u}') = 0. 



Cyclic terms and substitutions for cyclic terms can be standardized apart by means of safe 
variable renaming. In the following, we will assume that cyclic terms and substitutions have 
their frozen variables standardized apart. With this method of standardization apart in place, 
we can return to substitutions and define composition of substitutions (that have their frozen 
variables standardized apart). 

Definition 23 (Composition of substitutions). Let (cr, cj) and (cr',w') be two substitutions, with 
frozen variables standardized apart. We define the composition of these two substitutions to be 
(a, uj) o (ct', uj') = (a o a' , uj U to'). The fact that the two substitutions have their frozen variables 
standardized apart ensures that the result is a substitution. 

Proposition 24. Let {<t,lu) and (ct',cj') be two substitutions, that have their frozen variables 
standardized apart. Let {a',Lu') be safe and proper for a given cyclic term {t,d), and let (cr, cj) 
be safe and proper for {<t' ,uj'){t,9). Then (cr, w) o (ct',cj') is safe and proper for {t,d). 

Proof. Let {a", to") = (a, w)o (cr',a;') = (crocr', cjUcj'). Since (cr,cj) and {a',Lu') have their frozen 
variables standardized apart, we know {a",uj") is a substitution. 

We show that {a" ,uj") is safe for (i, 6). Since (cr', w') is safe for (t, 0), we know that doin{uj') D 
FVar{t) = 0. Also, since (cr,a;) is safe for (a' ,uj'){t,6), we know that dom{uj)r\FVar{a'{t)) — 0. 
This implies that dom{u}) n FVar{t) = 0. Thus {dom{u}) U dom{u}')) n FVar{t) = 0. And thus 
dom{uj U w') n FVar{t) == 0. Thus {a", uj") is safe for (t, 0). 

We show that {a",uj") is proper for {t, 9). Take an arbitrary y G FVar{rng{(jj"\pvar{a"(i))))- 
We show that y £ FVar{a"{t)). We know that there exists a y' >-^ tyi G to" such that y' G 
FVar{a"{t)) and y G FVar{tyi). Since y' G FVar{a{a' {t))), we know that either (i) y' G 
FVar{a'{t)) or (ii) for some x G Var{a'{t)) we have that y' G FVar{a{x)). In case (i), since 
(cr',u;') is proper for {t,9), we know that y G FVar{<7'{t)), and thus also y G FVar{a"{t)). In 
case (ii), since (a, cj) is proper for {(T\uj'){t,9), we know y G FVar{a{a'{t))) ~ FVar{(T"{t)). D 

Finally, we introduce some notational conventions. Firstly, we will often denote cyclic terms 
(t, 9) with i, and denote substitutions for cyclic terms (cr, uj) with a. Secondly, we introduce a 
notation to refer to subterms of cyclic terms. In order to do so, we define the notion decomposable 
form for cyclic terms. 

Definition 25. A cyclic term (t, 9) is in decomposable form iit ^ y and for every direct subterm 
t' G sub{t) oft holds that FVar{rng{9\pvarit')) ^ FVar{t'). 

Proposition 26. For every cyclic term {t,9), there is an equivalent cyclic term {t',9') in de- 
composable form. 

Proof (sketch). For any cyclic term (i, 9) and any mapping y t-^ ty E 9, applying the mapping 
/9 = {j/ I— >■ ty} to any subterm of t or rng{9) results in a cyclic term (t' , 9') equivalent to {t, 9) 
(after restricting the domain of 9' if necessary) . By applying a finite number of such equivalence 
preserving transformations, any cyclic term can be transformed into decomposable form. D 

In the following, we assume without loss of generality that cyclic terms are in decompos- 
able form. Any cyclic terms that are not in decomposable form, we implicitly transform to 
decomposable form. 

Definition 27. We say that a cyclic term {t,9) is of the form d{ti, . . . ,t„), for d G C U J^, 
if t = (i(ti, . . . , i„). We assume without loss of generality that (t, 9) is in decomposable form. 
In this case, for 1 < i < n, we let {ti,9i) denote the cyclic term that is obtained by letting 

^i = (^\FVar{ti)- 



Thirdly, we define substitution of subterms of cyclic terms. 

Definition 28. For a given cyclic term {t, 9) we define the (possibly infinite) set of positions 
pos{t,e) CN* as follows. 

pos{x,e) = {e} 

pos{d{ti, . . . ,tn),0) = {e} U {1 • m I TO G pos{ti)} U • • • U {n • m [ to £ pos{tn)} 

Note that we do not explicitly handle the case for t G y, since we implicitly transform cyclic 
terms to decomposable form. 

Definition 29 (Fixed-position substitutions). For given cyclic terms {t,9) and {t',0') (with 
their frozen variables standardized apart), and a position to G pos{t,9) of {t,9), we define the 
fixed-position substitution {t,9)[{t' ,9')]rn as: 

{t,9W,9')]rn = (i[t'W,(eU0')lt[t']J 
t[t'], = t' 
uitij . . . , tfij [t li-rn' — ^l^t^i , . . . , t^—i , t^ [t J 777' , t^+l 7 • • • 7 ^n J 

Again, we do not explicitly handle the case for t d y, since we implicitly transform cyclic terms to 
decomposable form. Note that since the two cyclic terms {t,9) and {t',9') are in decomposable 
form and have their frozen variables standardized apart, the result {t,9)[{t' ,9')]rn of a fixed- 
position substitution is a cyclic term. 

Fourthly, in the following, we will denote cyclic terms {t, 9) where 9 = {yi i-t- ii, . . . , i/„ i-> t„} 
in Curry notation as t {yl -> tl, . . . , yn -> tn}. 

Note that in this paper, we will not make the connection between cyclic terms in the above 
syntactic sense and regular terms precise. The intuition is that the set of cyclic terms corresponds 
to the set of (finitely-branching) regular terms. Making this intuition precise is a topic of further 
research, and is closely related to the topic of finding a declarative semantics of our approach 
(see Section [5]). 

2.1.1 Adding typing 

For the purposes of functional logic programming, we would like to extend the above machinery 
with the concept of types. For the sake of simplicity of presentation, we have not done this 
explicitly above. Extending the above with typing is, however, very straightforward. We describe 
the steps that have to be taken to extend the above with typing. 

We need a many sorted signature E, to start with. Also, we explicitly partition the set X 
of variables and the set y of frozen variables into sets for each sort. Then, for cyclic terms 
{t,9), we pose the usual typing constraints on t and on all mappings in 9. For substitutions 
(cr, w) on cyclic terms, we pose the usual typing constraints on all mappings in a and w. Finally, 
we straightforwardly add typing constraints on frozen variable renamings and fixed-position 
substitutions. 

2.1.2 Computing unification 

An algorithm to compute whether a unifier for two cyclic terms (that have their frozen variables 
standardized apart) exists, and to compute such a unifier, is given in Algorithm[TJ This algorithm 
is based on the Martelli-Montanari algorithm [5]. 

Theorem 30 (Termination). The unification algorithm always terminates, no matter what 
choices are made. 



Proof (sketch). Similarly to the proof of termination for the Martelli-Montanari algorithm [B], 
we define a well-founded ordering that decreases with every action taken. To the ordering used 
in [B], we add (as most significant dimension), the following measure. 

maxsize{H) — size{H) 

We know 9 and 9' are fixed and finite. Since only finitely many variables from X occur in E (and 
the number of such variables never increases), the number of equations in F is finitely bounded. 
For every substitution x *—;■ i applied to terms in E, the size of t is bounded by the size of E (at 
the time of applying x t-^ t). For every substitution y <-^ t G F, the size of t is also bounded by 
the size of E (at the time of adding y i-^ t to F). For every substitution y h^ t e 9U9' , the size of 
t is bounded as well. There are finitely many different possible mappings that can be applied to 
equations in E. Furthermore, there exists an upper bound on this number of mappings. Thus, 
since E is initially finite, we know there is an upper bound for the number of different equations 
that can occur in E. Since only equations occurring in E can be added to H, the size of H also 
has this bound. Thus maxsize{H) is well-defined, and therefore this is a valid measure. 

It is easy to see that with each action, this well-founded ordering decreases. Thus the algo- 
rithm terminates. D 

Theorem 31 (Partial correctness). On termination of the algorithm, a unifying substitution is 
returned iff a unifying substitution exists. 

Proof (sketch). It is easy to see that if an (_E, F) is returned, then it is a substitution. If E 
contains anything other than equations of the form x = t, where x occurs only once in E, then 
there are still actions that can be performed. Also, for any mapping y i— >■ i e _F, we know that 
y occurs in the rhs of some mapping in E, because of the structure of the only rule introducing 
mappings to F. Because of the structure of this same rule, we have that for any y that occurs in 
the rhs of a mapping in E, there is a mapping y t^ t £ F. Furthermore, because of the structure 
of this same rule, we know that {E, F) is safe and proper for both (i, 9) and (i', 9'). 

In order to see that {E,F) is a unifier of {t,9) and {t',9'), consider the following condition, 
in which we fix suitable mappings a and lo. 

There exists a bisimulation between the cyclic term graphs 
of (cr(i), (6*0 61' Uw) !„(()) and {a{t'),{9 U 9' U uj)\^^t,j), for each t = t' e EUH. 

This condition holds on successful termination of the algorithm, for (cr, oj) — {E,F). For all 
equations x ^ t^ £ E, this holds since a; h^ t^. e cr. For equations y ^ ty £ H the condition 
holds as well. We know y = ty can only be in H if it was in E before. If there is no such 
bisimulation (as specified in the condition), by the structure of the rules, the algorithm would 
return with ±. However, since the algorithm terminated successfully (by assumption), we know 
such a bisimulation must exist. 

We know that the algorithm can only halt with failure because of rule (2). By the structure 
of rule (2), we know if the algorithm halts with failure, the condition does not hold (for any cr). 
It suffices to show, for each (other) action that can be performed, that the condition holds before 
applying the action iff it holds after applying the action. The cases for rules (1), (3), (4) and (5) 
are trivial. The cases for rules (6), (7), (8) and (9) can be proven straightforwardly. This proves 
that the condition holds on initiating the algorithm, for (cr, a;) = {E,F), if the algorithm halts 
with {E,F). It also proves that the condition holds for no (cr, w) on initiating the algorithm if 
the algorithm halts with _L. From this claim, it follows that the algorithm halts with a unifier 
{E, F) iff such a unifier exists. D 



Algorithm 1: Unification algorithm for cyclic terms. 

vmFY{{t,e),{t',e')) 

Input: Two cyclic terms {t,d) and {t',d'), with frozen variables standardized 

apart. 

Output: A unifier {(JjOj) of the two cyclic terms if it exists, or else ±. 

Let E = {t = t'}. Let H = %. Let F = %. While some action can be performed, 
and no failure has occurred, do the following. Nondeterministically choose from 
the set E of equations an equation of a form below (such that the corresponding 
condition holds) and perform the corresponding action. Note that x ranges over 
variables in X , y over frozen variables in 3^, and t over terms in Ti{X U 3^). 





form 








condition 




action 


(1) 


,f(si,.. 


•,s„) = 


= /(tl,. 


..,tn) 


T 




replace by the equations si = ii, 

. . . , Sn ^ in 

halt with failure 


(2) 


/(si,.. 


•,s„) = 


= g{ti,.. 


.,tn) 


//5 




(3) 


X = X 








T 




delete the equation 


(4) 


t = X 








t^X 




replace by the equation x ^ t 


(5) 


t = y 








t^xuy 




replace by the equation y ^ t 


(6) 


x = t 








X ^ Var{t) 
X occurs in 
other equat: 


and 
an- 
ion 


perform the substitution x i-^ t on 
all other equations 


(7) 


X = t 








X G Var{t) 




for a fresh y: replace by the equa- 



tion X = y; apply the substitution 
a; I— >■ y, on all other equations; and 
add y i— > t{x i-^ y} to F 
(8)j/ = t y = t £ H delete the equation 

(9)j/ = t y = t ^ H add y = t to H\ and apply the 

unique substitution y i-^ t' from 
eu9' UF tot 

When the algorithm terminates with failure, return _L. Otherwise, return {E, F), 
where E is seen as a mapping from X to T,{X uy). 

2.2 Systems of equations 

Another possible representation of regular (infinite) terms would be systems of equations. Such 
representations of infinite terms can, for instance, be found in (certain implementations of) Pro- 
log and several languages used for coinductive specifications. Because of their use in different 
contexts, the reader might be familiar with systems of equations, and might appreciate a mo- 
tivation for the choice of using cyclic terms instead of systems of equations. In fact, there is 
a one-to-one correspondence between cyclic terms and systems of equations. Below, we illus- 
trate how cyclic terms can be straightforwardly transformed to systems of equations, and vice 
versa. A major advantage of the use of cyclic terms is that this manner of representing regular 
terms allows us to to define the operational semantics in such a way that the connection to the 
operational semantics of regular Curry is very clear (see Section |31). 

2.2.1 Correspondence with cyclic terms 

We informally describe how systems of equations can be transformed straightforwardly to cyclic 
terms, and vice versa. We will do so by means of an example. A formal definition of systems of 
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equations and the transformations to and from cyclic terms is beyond the scope of this paper. 

Example 32. Consider the regular infinite tree represented by the cyclic term, for symbols 
f,g,he S: 

{fi9{y,y'))Ay ^ 9{y,y').y' ^ Hy')}) 

This regular tree can also be represented by the following set of equations, with root x: 
{x = f{g{x',x")), x'^g{x',x"), x" = h{x")} 

It is easy to see that a cyclic term (t, 0) can be written as a system of equations by mapping 
each frozen variable to a (regular) variable, and (possibly) adding an extra variable as root to 
refer to t. 

Conversely, a (finite) system of equations can be written as a cyclic term (i, 9) as follows. 
We map the variables that occur on the left hand side of equations to (distinct) frozen variables. 
We take the frozen variable corresponding to the distinguished variable in the equation as t. We 
let 9 be the mappings corresponding to the equations. Possibly, we need to unfold t by applying 
mappings from 9 until all frozen variables occurring in 9 also occur in t. 

3 Computational strategy 

With the (well-behaved) data structures to represent regular terms in place, we are ready to 
define the computational strategy that uses generalized circular coinduction. Note that in the 
following, we use cyclic terms (often simply denoted terms) and the corresponding notions of 
substitutions and unifiers. 

3.1 Informally 

The intuition behind our computational strategy is fairly simple. The idea is to detect circularity 
in the reductions performed, and breaking out of such a circle by assigning a possible value to 
the (function symbol rooted) term which is evaluated repeatedly. What the possible values are 
is something that needs to be specified by the programmer. The reason for this is discussed in 
Section 13.31 

More concretely, this results in the following computational mechanism, based on the needed 
narrowing mechanisms from [TJ [7] . Analogously to the method of detecting cyclic behavior in 
[S], in every derivation, we keep track of the (function symbol rooted) expressions on which 
narrowing is applied in the derivation, together with the total term they appear in and their 
position in this total term. As soon as the term t (appearing as subterm of the total term ttot) 
on which narrowing is about to be applied, and some term t' (appearing as subterm of the total 
term ij^j) on which narrowing is applied previously, unify (with unifier a), we do the following. 

• We (nondeterministically) guess a possible resulting value for the function symbol rooted 
expression occurring at the root of both t and t' , from the possibilities specified by the 
programmer. 

• To the derivation, we add the constraint a{t^^f) = cr(ij^j), where t^^^ is the term ttot h^ 
which the subterm t is replaced by the guessed result, and ij^j is defined similarly. 

• We continue the derivation with a{tfgf). 

Also, if during the derivations we encounter constraints of the form t = i', we try to unify 
them. 
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3.2 Formal definition 

In order to formally define our computational mechanism, we recall some preliminary notions, 
known from the literature on functional logic programming and Curry. We define patterns and 
(partial) definitional trees. 

Definition 33 (Taken from Definition 2 in T). A pattern is a term /(ii, . . . ,in), where n is 
the arity of f E J- and each ij, for 1 < i < n, is a constructor term. 

Definition 34 (Definition 12 in [7 ). T is a partial definitional tree (pdt) with pattern tt iff one 
of the following cases holds: 

• T ~ branch{TT, o, 7i, . . . , 7fc), where tt is a pattern, o is the occurrence of a variable in tt, 
the sort of 7r|o has constructors ci, . . . , Cfe for some A: > 0, and for all z S {1, . . . , k}, % is 
a pdt with pattern 7r[ci(Xi, . . . , X„)]o, where n is the arity of Ci and Xi, . . . , X„ are new 
distinct variables. 

m T — leaf{TT), where tt is a pattern. 

Definition 35 (Taken from 7 and [l]). Let TZhe a rewrite system. T is a definitional tree of 
an operation / iff T is a pdt whose pattern argument is f{Xi, . . . , X„), where n is the arity of / 
and Xi, . . . , Xn are new distinct variables, and for every rule I ^>^ r oi TZ with I — f(ti, . . . , t„), 
there exists a leaf leaf{'K) of T such that I is a variant of tt, and we say that the node /ea/(7r) 
represents the rule Z — > r, in which case we will also write leaf {I -^ r). We write pattern{T) for 
the pattern of a definitional tree T and DT for the set of all definitional trees. 

Besides the notions used in the usual computational mechanism of Curry, we will need a few 
additional notions to make our computational strategy work. We define memory configurations, 
and several types of expressions used in the computation. 

Definition 36. We denote with Mem the set of all memory configurations V{CT x CT x N*). 
A memory configuration thus is a set of triples consisting of two cyclic terms and a sequence of 
natural numbers (representing a position in the second cyclic term). 

Definition 37. We denote with EQ the set of all equations of the form t ^ t' , where t, t' € CT, 
and the trivial (dummy) equation T. 

Definition 38 (Based on definitions in [T]). An answer expression is a pair (a, e), consisting of 
a substitution a and an expression e. An answer expression (a, e) is solved if e is a constructor 
term. A disjunctive expression is a (multi-)set of answer expressions {(cri, ei), . . . , (cr„, e„)}, 
sometimes written as ((Ti,ei) V ... V (cr„,e„). The set of all disjunctive expressions is denoted 
with v. A memory answer expression is a pair (cr, e,A/), where (cr, e) is an answer expression, 
and A/ G Mem is a memory configuration. A memory answer expression {a,e,M) is solved 
if the answer expression (u, e) is solved. A disjunctive memory expression is a (multi-)set of 
memory answer expressions. Notation is analogous to the notation of disjunctive expressions. 
The set of all disjunctive memory expressions is denoted 'DMem- A memory constraint answer 
expression is a pair (cr, e, M, eq), where (tr, e, M) is a memory answer expression, and eq £ EQ is 
an equation. A disjunctive memory constraint expression is a (multi-)set of memory constraint 
answer expressions. Notation is analogous to the notation of disjunctive expressions. The set of 
all disjunctive memory constraint expressions is denoted 'DMem,EQ- 

In order to handle the additional types of expressions defined above, we adapt several auxiliary 
functions known from the usual computational strategy of Curry. 
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Definition 39. We define the function pair : {'DMem^{suspend})x EQ — >■ Tyj^iem.EQ^isuspend} 
as follows. 

pair [suspend, eq) = suspend 

pair({(cri, ei, Ml), . . . , (cr„, e„, M„)}, eq) = {(cti, d, Afi, eg), . . . , (ct„, e„, M„, eg)} 

Definition 40 (Based on definitions in [1]). We define the auxiliary functions compose and 
replace as follows. Note that the function est will be defined below. 



composeit, 7", a, t' , o', M) 



' {{a,t,M)) iicst{t,T,t',o',M) = 

suspend 

{(cTi o cr, ti. Ml), . . . , if csi(t, r, t', o', M) = 

(cr„ ocr,i„,M„)} {(o-i,ti,Mi),..., (cr„,i„,M„)} 



replace{t, o, suspend) — suspend 
replace(t, o, {(cri, ii, Mi, egi), . . . , (cr„,i„, M„, e(7„)}) = 
{(cri,(Ti(i)[ii]o,Mi,egi), . . . , (ct„, cri(t)[t„]o, M„, eg„)} 

With all the preliminary notions in place, we can now define formally what possible guesses 
for circular behaviour are. 

Definition 41. Possible guesses are defined by a partial function p : CT — > P{CT). We say 
that t' is a possible guess for a cyclic term t € CT if i € dom{p) and i' e p(i). 

We are now ready to define the two functions cs and est that handle the computational steps 
in derivations. 

Definition 42 (Based on definitions in [1 ). The function cs : CT x CT x N* x Mem -^ 
T>Mem,EQ U {suspcnd} , designed to perform a computation step, is defined as follows. 

cs{x,ttot,o, M) = suspend for all variables a:: £ A" (1) 

cs{t^t',ttot,o,M) = {(a, T,M, T)} if a unifies i and t' (2) 

cs{f{ti,...,tn),ttot,o,M) = pair{cst{f{ti,...,tn),T,ttot,o, if T is a definitional 

M), T) tree for / and rule (2) 

does not apply (3-1) 



{W,g,M,a{ttot)[g]o = cT{tt„t)[g]o') where t = f{ti,...,t„) 

I {t',tf^t,o') £ M,a unifies t and 

i', g is a possible guess for (j(i)} (3.2) 

cs{c(ti,... ,tn),ttot,o,M) = replace{c{ti,. ..,t„),k, li cs{ti,ttot,o ■ i,M) = 

cs(tk,ttot,o ■ k,M)) suspend, for all 1 < i < A; 

and cs(tk,ttot,o ■ k, M) / 
suspend (4) 

cs(c(ii,. . . ,f„),ftot,o, M) = suspend li cs(ti,ttot,o ■ i,M) = 

suspend for all 1 < i < n (5) 
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Notice the use of nondeterminisni in Definition 1421 in particular in case (3). In order to allow 
the programmer to use any form of nondeterminism, we opt for as much nondeterminism in the 
computational strategy as possible. The choice to break cyclicity in derivations (case (3.2)) or 
simply continue the derivation (case (3.1)) is nondeterministic. When breaking cyclicity, only 
the single currently evaluated term is replaced by a possible guessed value, not all occurrences 
of this term in the answer expression. Also, we do not remember what guessed values we have 
applied in a derivation. This way, different guesses can be applied to (several occurrences of) the 
same term in one derivation. 

Definition 43 (Based on definitions in [T]). The function est : CT x DT x CT xN* x Mem -^ 
{T^Mem U {suspend}), designed to perform the application of a reduction (narrowing) step, is 
defined as follows. 

cst{t, leaf {I —^ r),t ,o , M) = {{id, a{r),M U {{t, f , o )})} if cr is a substitution with a(l) = t 



' cst{t,Ti,t',o',M) 



cst{t, hranch{-K, o, 7i , 
...,%), t',o',M) 



if t|o = c(ii,. . . ,t„) and 
pattern{Ti)\o = c{Xi, ..., X„) 

if t\o — c(ii, . . . ,f„) and 
pattern{7l)\o / c(. . .), i = 1, . 



IJi=i compose{ai{t) ,Ti , (Ti,t' , o' , M) if t\o — X and 

ai ^ {X h^ pattern{Ti)\o} 



replaceit, o, cs[t\o,t' , o' ■ o, M)) 



\it\o = /(ii, . . . ,t„) 



The main difference between the above definitions for the functions es and est and their 
definitions in [1] is that in the above definitions we keep track of (1) a memory configuration M , 
(2) the total term ttot (resp. t') on which the computation step takes place and (3) the position 
o (resp. o') in this total term that is currently being evaluated. Also, with each application of a 
reduction rule (the first case for est) , we add an appropriate entry to the memory configuration. 
This allows us to resolve the circular behavior in case (3.2) for cs, exactly as described in 
Section 13.11 

We remember each term on which a reduction step is applied (the first case for est) . It would 
be sufficient to remember only those terms for which a possible guess is available. This would 
result in an equivalent (yet in principle more efficient) computational mechanism. For the sake 
of simplicity of presentation, we don't make this distinction. 

Finally, we introduce a few standard reduction rules and we define what derivations are. We 
use the following definitions of A and =>, as in [1]. 

TAX -^X 



{T ^ X)^X 

Definition 44 (Based on definitions in J^). A rewriting step for a disjunctive memory expression 
(denoted with — >) goes as follows. 

D V {a, e, M) V D' ^ D W {ai o a, eqi => d. Mi) V ... V {an o a, eq,, => e„, M„) V D' 

if (cr, e, M) is unsolved and es{e, e, e, M) — {(cri, ei. Mi, eqi), . . . , (cr„, e„, M„, eg„)} 

Here, we let T =» i denote t. A derivation is a finite sequence of rewriting steps. A derivation 
for a term e is a derivation starting with the disjunctive memory expression (0, e, 0). 



14 



3.3 Restrictions on the assumptions 

The need to specify explicitly what are possible resulting values for a term that is evaluated 
repeatedly in a circular derivation, is illustrated nicely by the following example. Consider the 
following program, given in Curry syntax. 

and [] = True 

and (x:xs) = x && (and xs) 

trues = True: trues 

Without any restrictions on the resulting values that can be guessed in circular derivations, 
we would be able to derive both True and False from and trues (by guessing True and False, 
respectively, as the resulting value of and trues). However, if we want to interpret and as 
conjunction over (finite and infinite) lists of Boolean values, only the answer True would be 
appropriate. Also, if we want to interpret and as the predicate denoting all finite lists of Boolean 
values whose conjunction is true, only the answer False would be appropriate. Since the inter- 
pretation is to be determined by the programmer, we need to let the programmer specify such 
choices. The possible guesses can intuitively be considered as the possible meaning of cyclic 
behavior. 

An advantage of placing explicit restrictions on the possible values for such nondetcrministic 
steps in the derivation, is that the number of possibilities is reduced enormously. This obviously 
has a positive effect on the efficiency of computation. 

How to specify the possible resulting values for each situation is a question that needs to be 
investigated further. With a program, the user needs to specify possible guesses with a partial 
function p : CT — >■ V{CT). A concise specification language in which every (reasonable) choice 
of values can be expressed is desirable. In this paper we will describe the possible guesses with 
rewrite rules of the form f ^» v (where f is a term, and v a set of terms), that get the following 
interpretation. If a term unifies with f with unifier 9, the possible guesses of the value of f are 
the values in the set 0(v). When v contains the anonymous variable _, by convention, we let the 
corresponding possible guess 9{_) be a fresh variable. 

4 Examples 

In order to illustrate the merit of our approach, we will discuss several examples. These examples 
show that certain problems can be programmed and solved in a very intuitive fashion in our 
approach. We will also argue that the problems exemplified here cannot be solved in a similarly 
intuitive manner in regular Curry. A number of derivations for the following examples can be 
found in Appendix \K\ 

4.1 Infinite lists 

In the program Vi in Figure[2l we consider infinite lists. This example shows that it is possible to 
use the usual definitions of conjunction (and), quantifiers (f orall and exists) and concatenation 
(append) to extend these functions to (regular) infinite lists, with the intended interpretation. 
Also, we can straightforwardly introduce a function inf that decides whether infinitely many 
elements of a list satisfy a certain property. 

We can make the following derivations by using program Vi . These example derivations illus- 
trate that the operations and, f orall, exists, inf and append get their intended interpretation 
on infinite lists. 
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Reduction rules: 

and [] = True 

and (x:xs) = x && (and xs) 

map f [] = [] 

map f (x:xs) = (f x) : (map f xs) 

forall f xs = and (map f xs) 

exists f xs = not (and (map (\x -> not (f x)) xs)) 

inf f xs = inf f False (loop xs) 

inf f b (x:xs) = inf f ( (f x) I I b) xs 

loop (x:xs) = loop xs 

append [] ys = ys 

append (x:xs) ys = x: (append xs ys) 

isEven n = mod n 2 == 
isOdd n = not (isEven n) 

ones = l:ones 
twos = 2: twos 

Assumption possibilities: 

and _ -^ {True} 

inf _ b _ -* {b} 
loop X -^ {x} 

append xs _ -^ {_} 



Figure 2: Example program Vi- 



term 




value 


substitution 


forall isOdd ones 


^* 


True 




exists isOdd twos 


v * 


False 




inf isDdd (2: ones) 


v * 


True 




inf isEven (2: ones) 


v * 


False 




append ones [2,3] 


, * 


y {y -> l:y} 





Regular Curry also supports infinite lists up to a certain extent, by means of lazy evaluation. 
We can, for instance, consider the infinite list ones, and reason with such infinite lists. However, 
reasoning on infinite lists in regular Curry is restricted to reasoning over (unbounded) finite 
sublists. For instance, for a conjunction over an infinite list of Boolean values, only cases in 
which the resulting value is False will terminate. In our approach, reasoning over (regular) 
infinite lists is not restricted in such a fashion. Of course, the reasoning used in our approach 
could be implemented in regular Curry as well, but this would require additional data types and 
reasoning methods to be made explicit. This would prevent a natural way of modelling. 
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4.2 Biichi automata 

In the program V2 in Figure [31 we consider Biichi automata, and in particular the example 
automaton given below. Note that the definitions for inf and loop are exactly the same as in Vi 
in Figured This example shows that we can directly encode the definition of a Biichi automaton, 
and the acceptance conditions of Biichi automata, resulting in a mechanism to decide acceptance 
(of regular infinite lists) of the particular automaton. 



start 





Reduction rules: 

— particular automaton 
trans 1 a = 1 

trans 1 a = 2 
trans 2 b = 2 

initial = 1 

final = 2 

— mechanism 

path q (s:ss) = q:(path (trans q s) ss) 

accept string = inf (\x -> x == final) (path initial string) 

inf f xs = inf f False (loop xs) 

inf f b (x:xs) = inf f ( (f x) I I b) xs 



loop (x:xs) = loop xs 

Assumption possibilities: 

inf _ b _ -> {b} 
loop X ^> {x} 

Figure 3: Example program V2- 

We can make the following derivations by using program 'P2. These example derivations 
show that the direct encoding of Biichi automata in 1^2 lead to a direct implementation that 
decides acceptance of infinite sequences. Note that this example shows that we can directly use 
nondeterminism (the Biichi automaton encoded in V2 is nondeterministic). 

term value substitution 

accept (a:a:y) {y -> b:y} — )•* True 

accept X — >* True {x -> a:y {y -> b:y}} 
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Of course, it is also possible to encode Biichi automata in regular Curry. However, encoding 
the acceptance conditions is not as straightforward as in our approach. In that case, namely, 
one has to explicitly represent (cyclic) paths and the existence of a final state in cycles of these 
paths. 

4.3 Bisimulation in Kripke structures 

In the program 7^3 in Figure SI we consider Kripke structures, and in particular the example 
structure given below. Note that the definitions for sLnd, forall and exists are exactly the 
same as in Vi in Figure [5J This example shows that we can directly encode the definition of 
several Kripke structures, and the bisimulation conditions of Kripke structures, resulting in a 
mechanism to decide bisimulation of the particular Kripke structures. 





We can make the following derivations by using program V^. These example derivations 
illustrate that the direct encoding of the bisimulation conditions directly lead to a decision 
procedure. 



term 




value 


substitution 


bisim "ml" 1 "m2" 2 


^* 


True 




bisim "ml" 1 "m2" x 


^* 


True 


{x -> 3} 



Similarly to the example of Biichi automata given above, it is possible to encode bisimulation 
of Kripke structures in regular Curry, but not nearly as directly and straightforwardly as in our 
approach. 

4.4 Manipulation of infinite lists 

In the program 7^4 in Figure [SJ we consider manipulation of infinite lists. This example shows 
that we can directly use the definition of several list manipulation operators from the finite case 
also in the infinite case (with regular terms), with the intended interpretation. 

We can make the following derivations by using program 7^4. These examples show that the 
operations zip, even and odd can be naturally used for infinite lists as well as finite lists. An 
equally natural encoding of such operations on infinite lists in regular Curry is not possible. 



term 




value 






substitution 


zip ones twos 


_^, 


1 


2:y {y - 


-> l:2:y} 




zip ones ones 


-^* 


1 


i:y ^y - 


-> l:l:y} 




odd (zip ones x) 


-^* 


1 


y ^y -> 


1 


y> 


(see below) 


even (zip x twos) 


-^* 


2 


y ^y -> 


2 


y> 


(see below) 


odd ones 


-^* 


1 


y ^y -> 


1 


y> 




even ones 


^* 


1 


y ^y -> 


1 


y> 





No derivation for odd (zip ones x) and even (zip x twos) leading to the mentioned val- 
ues has an empty substitution. Each derivation results in a substitution mapping x to an infinite 
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list (representable by a cyclic term). Furthermore, for every substitution mapping x to any cyclic 
term representing an infinite list (containing only fresh variables), there is a derivation leading 
to the mentioned values with this substitution. 

Note that the term nat n, for any integer n, is infinite and non-regular. Our computational 
strategy is not suited to reason about such terms. This example illustrates this. We have that 
evaluating the following terms results in a diverging derivation. Similar effects occur when such 
non-regular infinite terms are used in the previous examples. 

term 

odd (zip ones (nat 1)) — ^* 
even (zip (nat 1) twos) — ^* 

5 Declarative semantics 

Naturally, when modifying the operational semantics to interpret programs coinductively, we 
would like to change the denotational, or declarative, semantics accordingly. In this section, we 
suggest a possibility for suitable denotational semantics. Also, by means of several examples 
we illustrate how this suggested semantics differs from the inductive case. Furthermore, these 
examples serve to illustrate the suitability of the suggested semantics for the coinductive case. 

For inductively interpreted functional logic programs, initial algebra denotational semantics 
is well-suited. Dually, for coinductively interpreted functional logic programs, we suggest a final 
coalgebra denotational semantics. For a general background on algebrae and coalgebrae, see for 
instance [9]. Consider the following (partial) signature specifying a particular type List: 

List -^ [] I N : List ; 

Intuitively, in the inductive case, terms (of type List) correspond to finite lists of natural numbers. 
In the coinductive case, intuitively, cyclic terms (of type List) correspond to finite or infinite 
lists of natural numbers. 

A suitable denotational semantics for terms of type List is the initial i^-algebra on the 
category of sets Set, where the corresponding functor F : {!.} U (N x X) ^ X is derived directly 
from the signature. Call this initial algebra LA\^ Terms correspond to elements of LA. In fact, the 
set of finite lists on N is a suitable initial algebra. Now, functions from terms to natural numbers 
get the denotation of an F-algebra on N, functions from terms to terms get the denotation of an 
i^-algebra on LA. For instance, the (Curry encoding of the) function length : List — >■ N returning 
the length of a list would denote the algebra (N, a), given by: 

a : {_L} U (N X N) ^ N 

± H- {x,n) h^ I + n 

By initiality of LA, there is exactly one morphism from LA to this algebra on N, which coincides 
with the function returning the length of lists in LA. Also, for instance, pairs of terms of type 
List are assigned the denotation of elements in the algebra {LA x LA). In an analogous fashion, 
denotational semantics in algebraic terms can be assigned to the complete program. 

The suggested final coalgebra semantics for cyclic terms of type List are completely dual to the 
initial algebra semantics for the inductive case. In this semantics, cyclic terms denote elements 
of the final G-coalgebra on Set, where the corresponding functor G : X —> {±} U (N x X) is 
derived directly from the signature. Call this final coalgebra FCo Cyclic terms correspond to 



^ There are more such initial F-algebrae on Set, but they are all isomorphic. 
^There are more such final G-coalgebrae on Set, but they are all isomorphic. 
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elements of FC. In fact, the set of all finite and infinite lists on N is a suitable final coalgebra. 
Assigning denotations to functions works dually to the inductive case. Functions from natural 
numbers to cyclic terms are G-coalgebrae on N, and functions from cyclic terms to cyclic terms 
are G-coalgebae on FC. For instance, the function repeat from natural numbers to cyclic terms 
given by repeat n = (n: : (repeat n)) would denote the coalgebra (N,/3), given by: 

/3 : N -!> {_L} U (N X N) 

n (— > (n, n) 

By finality of _FC, there is exactly one morphism from this coalgebra on N to FC ^ which coincides 
with the function mapping any natural number to the infinite list containing only this number. 
Also, for instance, pairs of cyclic terms are assigned the denotation of elements in the coalgebra 
[FC X FC). Again, analogously, the whole program can be assigned denotational semantics in 
coalgebraic terms. 

The above exposition is a gross oversimplification, of course. Things get more intricate, 
for instance, when a program is interpreted partially inductively and partially coinductively. 
Further research is needed on the topic of denotational semantics. We merely suggest a direction 
for research in this area. 

6 Conclusions 

We showed how functional logic programming can be adapted to interpret programs coinductively 
as well as inductively. We singled out a particular class of (possibly infinite) objects interesting 
for this kind of reasoning, namely regular terms, and showed how the usual data structures 
can be modified to capture these objects. We showed how the operational semantics of the 
functional logic programming language Curry can be altered to allow for coinductive reasoning, 
and suggested how a suitable declarative semantics can be obtained. Furthermore, we illustrated 
the working and usefulness of our methods with several examples. 

Working out a declarative semantics in full detail, and relating this semantics to the oper- 
ational semantics, would be a topic of further research. Another direction for further research 
would be to investigate whether and how the computational mechanisms used in this paper could 
be optimized. 
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A Example derivations 

In Figure [BJ we include several derivations for the example programs given in Section 21 For each 
derivation, we indicate certain (meaningful) steps in the derivation, together with the cases of the 
function cs used to get from the previous step to this step (indicated in the column titled case 
of cs), and the (partial) resulting substitution calculated in the derivation from the previous 
step to this step (indicated in the column titled a). 
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Reduction rules: 



— kripke structures 
state "ml" = 1 
trans "ml" 1=1 
val "ml" 1 = 'p' 



state 


"m2" 


= 


2 


state 


"m2" 


= 


3 


trans 


"m2" 


2 


= 2 


trans 


"m2" 


2 


= 3 


trans 


"m2" 


3 


= 2 


trans 


"m2" 


3 


= 3 


val "m2" 2 


= 


'P' 


val "m2" 3 


= 


'P' 



— mechanism 

bisim ml wl m2 w2 = 

let nextl = findall (trans ml wl) 
and next2 = findall (trans m2 w2) in 

sameSet (findall (val ml wl)) (findall (val m2 w2)) && 

forall (\vl -> (exists (\v2 -> bisim ml vl m2 v2) next2) nextl) 

forall (\v2 -> (exists (\vl -> bisim ml vl m2 v2) nextl) next2) 

and [] = True 

and (x:xs) = x && (and xs) 

forall f xs = and (map f xs) 

exists f xs = not (and (map (\x -> not (f x)) xs)) 

sameSet xs ys = (subSet xs ys) && (subSet ys xs) 

subSet [] _ = True 

subSet (x:xs) ys = (elem x ys) && subSet xs ys 

Assumption possibilities: 

and _ ^> {True} 

bisim _ _ _ _ ^> {True} 



Figure 4: Example program Vs- 
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Reduction rules: 



zip [] ys = ys 

zip (x:xs) (y:ys) = x:y:(zip xs ys) 

odd [] = [] 

odd (x:xs) = x:(even xs) 

even [] = [] 

even (x:xs) = odd xs 

ones = l:ones 
twos = 2: twos 

nat n = n: (nat (n+1)) 



Assumption possibilities: 

zip _ _ -^ {_} 
odd _ -> {_} 



Figure 5: Example program Vi- 
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term 

forall isOdd ones 

and (map isOdd ones) 

and ((isOdd 1) : (map isOdd ones)) 

and (True: (map isOdd ones)) 

True && (and (map isOdd ones)) 

and (map isOdd ones) 

True 



case(s) of cs a 

(3.1) 
(3.1) 
(3.1) 
(3.1) 
(3.1) 
(3.2), (2), (3.1) 



term 

append ones [2,3] 
1: (append ones [2,3]) 
(xl == l:xl) => xl 
True => yl {yl -> l:yl} 
yl {yl -> l:yl} 



case(s) of cs a 



(3.1) 
(3.2) 
(2) 
(3.1) 



{xl -> yl {yl -> l:yl}} 



term 




accept X 




inf (==final) 


(path 


inf (==final) 


False 


inf (==final) 


False 


inf (==final) 


False 


inf (==final) 


False 


inf (==final) 


False 


inf (==final) 


False 


inf (==final) 


((2== 


inf (==final) 


True 


inf (==final) 


True 


True 





case(s) of cs 



initial x) 
(loop (path initial x)) 
(loop (l:(path 2 x2))) 
(loop (path 2 x2)) 
(loop (2: (path 2 x3))) 
(loop (path 2 x3)) 
(path 2 yl) {yl -> b:yl} 
final) I I False) (path 2 yl) 
(path 2 yl) {yl -> b:yl} 
(path 2 yl) {yl -> b:yl} 



(3.1) 


(3.1) 


(3.1) 


(3.1) 


(3.1) 


(3.1) 


(3.2) 


(3.1) 


(3.1) 


(3.1) 


(3.2) 



{x -> (a:x2)} 
{x2 -> (b:x3)} 
(2), (3.1) {x3 -> yl {yl -> b:yl}} 

(2), (3.1) 



term 

odd (zip ones x) 
odd (l:xl:(zip ones xsl)) 
l:(odd (zip ones xsl)) 
(x2 == l:x2) => x2 

True => y2 {y2 -> l:y2} 
y2 {y2 -> l:y2} 



case(s) of cs 


(T 


(3.1) 


{x -> (xl:xsl)} 


(3.1) 




(3.2) 


{x -> yl, xsl -> yl 




{yl -> xl:yl}} 


(2) 


{x2 -> y2 {y2 -> l:y2}} 


(3.1) 





Figure 6: Example derivations. 
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